home *** CD-ROM | disk | FTP | other *** search
/ Amiga Mag HDD Backup / Amiga Mag HDD Backup.zip / Amiga Mag HDD Backup / Alexander.img.bin / Alexander.img / Adobe PageMaker 6.0 / Utilities / Update PPD 1.7 / Update PPD 1.7.rsrc / TEXT_400_*PageSizes.txt < prev    next >
Text File  |  1995-07-13  |  11KB  |  156 lines
  1. %-----
  2. {
  3.  
  4. {DoPapers{findPapers}if}stopped not
  5. {
  6. save
  7. mark
  8. MaxPage ISO_JISA or ISOB or ISOC or JISB or US or UserPapers or GoPapers and
  9. {(*% Extra Paper Information =============================================) D
  10. () D (*OpenUI *PageSize: PickOne) D (*OrderDependency: 30 AnySetup *PageSize) D () D}if
  11. MaxPage GoPapers and
  12. {R C (*PageSize MaxPage_\() M C X Measure 32 string cvs M C (x) M C Y Measure 32 string cvs M C (\): ") M C X 32 string cvs M C ( ) M C Y 32 string cvs M C ( 1 statusdict begin setpage end") M POST}if
  13. ISO_JISA GoPapers and 
  14. { % PageSize
  15.  (*PageSize A0.Extra: "2456 3442 1 statusdict begin setpage end") 2456 3442 paperStyle
  16. (*PageSize A0.Extra.Transverse: "3442 2456 0 statusdict begin setpage end") 3442 2456 paperStyle
  17. (*PageSize A1.Extra: "1720 2456 1 statusdict begin setpage end") 1720 2456 paperStyle
  18. (*PageSize A1.Extra.Transverse: "2456 1720 0 statusdict begin setpage end") 2456 1720 paperStyle
  19. (*PageSize A2.Extra: "1263 1756 1 statusdict begin setpage end") 1263 1756 paperStyle
  20. (*PageSize A2.Extra.Transverse: "1756 1263 0 statusdict begin setpage end") 1756 1263 paperStyle
  21. (*PageSize A3.Extra: "914 1263 1 statusdict begin setpage end") 914 1263 paperStyle
  22. (*PageSize A3.Extra.Transverse: "1263 914 0 statusdict begin setpage end") 1263 914 paperStyle
  23. (*PageSize A4.Extra: "667 914 1 statusdict begin setpage end") 667 914 paperStyle
  24. (*PageSize A4.Extra.Transverse: "914 667 0 statusdict begin setpage end") 914 667 paperStyle
  25. (*PageSize A5.Extra: "492 667 1 statusdict begin setpage end") 492 667 paperStyle
  26. (*PageSize A5.Extra.Transverse: "667 492 0 statusdict begin setpage end") 667 492 paperStyle
  27. (*PageSize A6.Extra: "369 492 1 statusdict begin setpage end") 369 492 paperStyle
  28. (*PageSize A6.Extra.Transverse: "492 369 0 statusdict begin setpage end") 492 369 paperStyle
  29. (*PageSize A7.Extra: "282 369 1 statusdict begin setpage end") 282 369 paperStyle
  30. (*PageSize A7.Extra.Transverse: "369 282 0 statusdict begin setpage end") 369 282 paperStyle
  31. (*PageSize A8.Extra: "220 282 1 statusdict begin setpage end") 220 282 paperStyle
  32. (*PageSize A8.Extra.Transverse: "282 220 0 statusdict begin setpage end") 282 220 paperStyle
  33. (*PageSize A9.Extra: "177 220 1 statusdict begin setpage end") 177 220 paperStyle
  34. (*PageSize A9.Extra.Transverse: "220 177 0 statusdict begin setpage end") 220 177 paperStyle
  35. (*PageSize A10.Extra: "145 177 1 statusdict begin setpage end") 145 177 paperStyle
  36. (*PageSize A10.Extra.Transverse: "177 145 0 statusdict begin setpage end") 177 145 paperStyle
  37. }if
  38. ISOB GoPapers and
  39. { % PageSize
  40. (*PageSize ISOB0.Extra: "2907 4080 1 statusdict begin setpage end") 2907 4080 paperStyle
  41. (*PageSize ISOB0.Extra.Transverse: "4080 2907 0 statusdict begin setpage end") 4080 2907 paperStyle
  42. (*PageSize ISOB1.Extra: "2076 2907 1 statusdict begin setpage end") 2076 2907 paperStyle
  43. (*PageSize ISOB1.Extra.Transverse: "2907 2076 0 statusdict begin setpage end") 2907 2076 paperStyle
  44. (*PageSize ISOB2.Extra: "1489 2076 1 statusdict begin setpage end") 1489 2076 paperStyle
  45. (*PageSize ISOB2.Extra.Transverse: "2076 1489 0 statusdict begin setpage end") 2076 1489 paperStyle
  46. (*PageSize ISOB3.Extra: "1073 1489 1 statusdict begin setpage end") 1073 1489 paperStyle
  47. (*PageSize ISOB3.Extra.Transverse: "1489 1073 0 statusdict begin setpage end") 1489 1073 paperStyle
  48. (*PageSize ISOB4.Extra: "781 1073 1 statusdict begin setpage end") 781 1073 paperStyle
  49. (*PageSize ISOB4.Extra.Transverse: "1073 781 0 statusdict begin setpage end") 1073 781 paperStyle
  50. (*PageSize ISOB5.Extra: "571 781 1 statusdict begin setpage end") 571 781 paperStyle
  51. (*PageSize ISOB5.Extra.Transverse: "781 571 0 statusdict begin setpage end") 781 571 paperStyle
  52. (*PageSize ISOB6.Extra: "426 571 1 statusdict begin setpage end") 426 571 paperStyle
  53. (*PageSize ISOB6.Extra.Transverse: "571 426 0 statusdict begin setpage end") 571 426 paperStyle
  54. (*PageSize ISOB7.Extra: "321 426 1 statusdict begin setpage end") 321 426 paperStyle
  55. (*PageSize ISOB7.Extra.Transverse: "426 321 0 statusdict begin setpage end") 426 321 paperStyle
  56. (*PageSize ISOB8.Extra: "248 321 1 statusdict begin setpage end") 248 321 paperStyle
  57. (*PageSize ISOB8.Extra.Transverse: "321 248 0 statusdict begin setpage end") 321 248 paperStyle
  58. (*PageSize ISOB9.Extra: "197 248 1 statusdict begin setpage end") 197 248 paperStyle
  59. (*PageSize ISOB9.Extra.Transverse: "248 197 0 statusdict begin setpage end") 248 197 paperStyle
  60. (*PageSize ISOB10.Extra: "160 197 1 statusdict begin setpage end") 160 197 paperStyle
  61. (*PageSize ISOB10.Extra.Transverse: "197 160 0 statusdict begin setpage end") 197 160 paperStyle
  62. }if
  63. JISB GoPapers and
  64. { % PageSize
  65. (*PageSize B0.Extra: "2992 484 1 statusdict begin setpage end") 2992 484 paperStyle
  66. (*PageSize B0.Extra.Transverse: "484 2992 0 statusdict begin setpage end") 484 2992 paperStyle
  67. (*PageSize B1.Extra: "2136 2992 1 statusdict begin setpage end") 2136 2992 paperStyle
  68. (*PageSize B1.Extra.Transverse: "2992 2136 0 statusdict begin setpage end") 2992 2136 paperStyle
  69. (*PageSize B2.Extra: "1532 2136 1 statusdict begin setpage end") 1532 2136 paperStyle
  70. (*PageSize B2.Extra.Transverse: "2136 1532 0 statusdict begin setpage end") 2136 1532 paperStyle
  71. (*PageSize B3.Extra: "1104 1532 1 statusdict begin setpage end") 1104 1532 paperStyle
  72. (*PageSize B3.Extra.Transverse: "1532 1104 0 statusdict begin setpage end") 1532 1104 paperStyle
  73. (*PageSize B4.Extra: "800 1104 1 statusdict begin setpage end") 800 1104 paperStyle
  74. (*PageSize B4.Extra.Transverse: "1104 800 0 statusdict begin setpage end") 1104 800 paperStyle
  75. (*PageSize B5.Extra: "588 801 1 statusdict begin setpage end") 588 801 paperStyle
  76. (*PageSize B5.Extra.Transverse: "801 588 0 statusdict begin setpage end") 801 588 paperStyle
  77. (*PageSize B6.Extra: "435 588 1 statusdict begin setpage end") 435 588 paperStyle
  78. (*PageSize B6.Extra.Transverse: "588 435 0 statusdict begin setpage end") 588 435 paperStyle
  79. (*PageSize B7.Extra: "330 435 1 statusdict begin setpage end") 330 435 paperStyle
  80. (*PageSize B7.Extra.Transverse: "435 330 0 statusdict begin setpage end") 435 330 paperStyle
  81. (*PageSize B8.Extra: "253 330 1 statusdict begin setpage end") 253 330 paperStyle
  82. (*PageSize B8.Extra.Transverse: "330 253 0 statusdict begin setpage end") 330 253 paperStyle
  83. (*PageSize B9.Extra: "199 253 1 statusdict begin setpage end") 199 253 paperStyle
  84. (*PageSize B9.Extra.Transverse: "253 199 0 statusdict begin setpage end") 253 199 paperStyle
  85. (*PageSize B10.Extra: "163 199 1 statusdict begin setpage end") 163 199 paperStyle
  86. (*PageSize B10.Extra.Transverse: "199 163 0 statusdict begin setpage end") 199 163 paperStyle
  87. }if
  88. ISOC GoPapers and
  89. { % PageSize
  90. (*PageSize C0.Extra: "2671 3748 1 statusdict begin setpage end") 2671 3748 paperStyle
  91. (*PageSize C0.Extra.Transverse: "3748 2671 0 statusdict begin setpage end") 3748 2671 paperStyle
  92. (*PageSize C1.Extra: "1909 2671 1 statusdict begin setpage end") 1909 2671 paperStyle
  93. (*PageSize C1.Extra.Transverse: "2671 1909 0 statusdict begin setpage end") 2671 1909 paperStyle
  94. (*PageSize C2.Extra: "1370 1909 1 statusdict begin setpage end") 1370 1909 paperStyle
  95. (*PageSize C2.Extra.Transverse: "1909 1370 0 statusdict begin setpage end") 1909 1370 paperStyle
  96. (*PageSize C3.Extra: "990 1368 1 statusdict begin setpage end") 990 1368 paperStyle
  97. (*PageSize C3.Extra.Transverse: "1368 990 0 statusdict begin setpage end") 1368 990 paperStyle
  98. (*PageSize C4.Extra: "721 990 1 statusdict begin setpage end") 721 990 paperStyle
  99. (*PageSize C4.Extra.Transverse: "990 721 0 statusdict begin setpage end") 990 721 paperStyle
  100. (*PageSize C5.Extra: "531 721 1 statusdict begin setpage end") 531 721 paperStyle
  101. (*PageSize C5.Extra.Transverse: "721 531 0 statusdict begin setpage end") 721 531 paperStyle
  102. (*PageSize C6.Extra: "395 531 1 statusdict begin setpage end") 395 531 paperStyle
  103. (*PageSize C6.Extra.Transverse: "531 395 0 statusdict begin setpage end") 531 395 paperStyle
  104. (*PageSize C7.Extra: "302 395 1 statusdict begin setpage end") 302 395 paperStyle
  105. (*PageSize C7.Extra.Transverse: "395 302 0 statusdict begin setpage end") 395 302 paperStyle
  106. (*PageSize DL.Extra: "384 696 1 statusdict begin setpage end") 384 696 paperStyle
  107. (*PageSize DL.Extra.Transverse: "696 384 0 statusdict begin setpage end") 696 384 paperStyle
  108. }if
  109. US GoPapers and
  110. { % PageSize
  111. (*PageSize Letter.Extra: "684 864 1 statusdict begin setpage end") 684 864 paperStyle
  112. (*PageSize Letter.Extra.Transverse: "864 684 0 statusdict begin setpage end") 864 684 paperStyle
  113. (*PageSize Legal.Extra: "684 1080 1 statusdict begin setpage end") 684 1080 paperStyle
  114. (*PageSize Legal.Extra.Transverse: "1080 684 0 statusdict begin setpage end") 1080 684 paperStyle
  115. (*PageSize Tabloid.Extra: "864 1296 1 statusdict begin setpage end") 864 1296 paperStyle
  116. (*PageSize Tabloid.Extra.Transverse: "1296 864 0 statusdict begin setpage end") 1296 864 paperStyle
  117. (*PageSize Ledger.Extra: "1296 864 1 statusdict begin setpage end") 1296 864 paperStyle
  118. (*PageSize Statement.Extra: "468 684 1 statusdict begin setpage end") 468 684 paperStyle
  119. (*PageSize Statement.Extra.Transverse: "684 468 0 statusdict begin setpage end") 684 468 paperStyle
  120. (*PageSize 7x9.Extra: "576 720 1 statusdict begin setpage end") 576 720 paperStyle
  121. (*PageSize 7x9.Extra.Transverse: "720 576 0 statusdict begin setpage end") 720 576 paperStyle
  122. (*PageSize 9x11.Extra: "720 864 1 statusdict begin setpage end") 720 864 paperStyle
  123. (*PageSize 9x11.Extra.Transverse: "864 720 0 statusdict begin setpage end") 864 720 paperStyle
  124. (*PageSize 9x12.Extra: "720 936 1 statusdict begin setpage end") 720 936 paperStyle
  125. (*PageSize 9x12.Extra.Transverse: "936 720 0 statusdict begin setpage end") 936 720 paperStyle
  126. (*PageSize 10x13.Extra: "792 1008 1 statusdict begin setpage end") 792 1008 paperStyle
  127. (*PageSize 10x13.Extra.Transverse: "1008 792 0 statusdict begin setpage end") 1008 792 paperStyle
  128. (*PageSize 10x14.Extra: "792 1080 1 statusdict begin setpage end") 792 1080 paperStyle
  129. (*PageSize 10x14.Extra.Transverse: "1080 792 0 statusdict begin setpage end") 1080 792 paperStyle
  130. }if
  131. UserPapers GoPapers and
  132. { % PageSize
  133. (*PageSize Magazine.Extra: "675 855 1 statusdict begin setpage end") 675 855 paperStyle
  134. (*PageSize Magazine.Extra.Transverse: "855 675 0 statusdict begin setpage end") 855 675 paperStyle
  135. (*PageSize MagazineNarrow.Extra: "657 855 1 statusdict begin setpage end") 657 855 paperStyle
  136. (*PageSize MagazineNarrow.Extra.Transverse: "855 657 0 statusdict begin setpage end") 855 657 paperStyle
  137. (*PageSize MagazineWide.Extra: "720 855 1 statusdict begin setpage end") 720 855 paperStyle
  138. (*PageSize MagazineWide.Extra.Transverse: "855 720 0 statusdict begin setpage end") 855 720 paperStyle
  139. (*PageSize MagazineBroad.Extra: "792 936 1 statusdict begin setpage end") 792 936 paperStyle
  140. (*PageSize MagazineBroad.Extra.Transverse: "936 792 0 statusdict begin setpage end") 936 792 paperStyle
  141. (*PageSize CompactDisk.Extra: "412 414 1 statusdict begin setpage end") 412 414 paperStyle
  142. }if
  143. MaxPage ISO_JISA or ISOB or ISOC or JISB or US or UserPapers or GoPapers and
  144. {() D (*CloseUI: *PageSize) D () D}if
  145. cleartomark
  146. restore
  147. APU.dct/ContinuePapers true put
  148. (??? 1 410 1) D
  149. }
  150. {(??? 0 499) D}
  151. ifelse
  152.  
  153. }
  154. stopped
  155. {(??? 1 -400 \(An error occured during creation of page size information. \(400\)\)) D quit}if
  156.